Подпрограммы модуля CRT

procedure ClearLine;
        Очищает линию на которой установлен курсор
procedure ClrScr;
        Очищает экран, заполняя его текущим цветом фона
procedure Delay(ms: integer);
        Делает паузу на ms миллисекунд
procedure GotoXY(x, y: integer);
        Переводит курсор в координаты (x,y)
procedure HideCursor;
        Скрывает курсор
function KeyPressed: boolean;
        Возвращает true если была нажата клавиша. Считать символ можно спомощью функции ReadKey
function ReadKey: char;
        Считыват нажатую клавишу
procedure SetWindowCaption(s: string);
        Задает заголовок консольного окна
procedure SetWindowSize(w, h: integer);
        Задает размеры консольного окна
procedure SetWindowTitle(s: string);
        Задает заголовок консольного окна
procedure ShowCursor;
        Показывает курсор если он скрыт
procedure TextBackground(c: integer);
        Задает цвет фона выводимого текста
procedure TextColor(c: integer);
        Задает цвет выводимого текста
function WhereX: integer;
        Возвращает Х-координату курсора
function WhereY: integer;
        Возвращает Y-координату курсора
function WindowHeight: integer;
        Возвращает высоту экрана
function WindowWidth: integer;
        Возвращает ширину экрана